10   ' ************************

11   ' * TIME TEST FOR SIN(X) *

12   ' ************************

14 CLS : LOCATE 10, 20

16 PRINT "CALCULATING SIN(X) - PLEASE WAIT"

20 PI = 3.14159265#: E = 2.7182818#: P3 = PI / 3

22 T1 = TIMER

28 FOR I = 1 TO 10000

30 Y1 = SIN(P3)

32 Y1 = SIN(P3)

34 Y1 = SIN(P3)

36 Y1 = SIN(P3)

38 Y1 = SIN(P3)

40 Y1 = SIN(P3)

42 Y1 = SIN(P3)

44 Y1 = SIN(P3)

46 Y1 = SIN(P3)

48 Y1 = SIN(P3)

50 Y1 = SIN(P3)

52 Y1 = SIN(P3)

53 Y1 = SIN(P3)

54 Y1 = SIN(P3)

56 Y1 = SIN(P3)

58 Y1 = SIN(P3)

60 Y1 = SIN(P3)

62 Y1 = SIN(P3)

64 Y1 = SIN(P3)

66 Y1 = SIN(P3)

68 Y1 = SIN(P3)

70 Y1 = SIN(P3)

72 Y1 = SIN(P3)

74 Y1 = SIN(P3)

76 Y1 = SIN(P3)

78 Y1 = SIN(P3)

80 Y1 = SIN(P3)

82 Y1 = SIN(P3)

84 Y1 = SIN(P3)

86 Y1 = SIN(P3)

88 NEXT I

90 T1 = TIMER - T1

92 PRINT : PRINT

94 PRINT "TIME REQUIRED TO EVALUATE SIN(X) = "; T1 / 300000!; " SECONDS."

99 END



